<%
		rs.addNew
		rs("ID")=session("sesID")
		rs("Razdel")=strRazdel
		rs("Dolzgn")=request.Form("txtDolzgn"&i)
		rs("FirstName")=request.Form("txtFirstName"&i)
		rs("SecondName")=request.Form("txtLastName"&i)
		rs("FatherName")=request.Form("txtFatherName"&i)
		rs("Telefon_Work")=request.Form("txtTelefonWork"&i)
		rs("Telefon_Mobile")=request.Form("txtTelefonMobile"&i)
		rs("Telefon_Mest")=request.Form("txtTelefonMestn"&i)
		rs("Telefon_Dr")=request.Form("txtTelefonDr"&i)
		rs("Faks")=request.Form("txtFax"&i)
		rs("Email")=request.Form("txtEmail"&i)
		rs.update
%>